home *** CD-ROM | disk | FTP | other *** search
/ Internet 53 / INTERNET53.iso / pc / software / windows / building / coldfusion studio evaluation / data1.cab / CFS_Wizards / CFML / DrillDown_AppendCriteria.wml < prev    next >
Encoding:
Text File  |  1998-10-08  |  1.6 KB  |  33 lines
  1. <CFSET Criteria = Attributes.fieldName>
  2. <CFSET Value = Attributes.value>
  3. <CFIF Attributes.FieldType is not 'DATETIME'>
  4.     <!--- escape quotes if field type is not datetime --->
  5.     <CFSET Value = Replace( Value, "'", "''", "ALL" )>
  6. </CFIF>
  7.  
  8. <CFIF ListFindNoCase( 'CHAR,MEMO', Attributes.FieldType )>
  9.     <CFIF Attributes.operator is 'EQUAL'>       <CFSET Criteria = Criteria & " = '#Value#' ">
  10.     <CFELSEIF Attributes.operator is 'NOT_EQUAL'>   <CFSET Criteria = Criteria & " <> '#Value#' ">
  11.     <CFELSEIF Attributes.operator is 'GREATER_THAN'><CFSET Criteria = Criteria & " > '#Value#' ">
  12.     <CFELSEIF Attributes.operator is 'SMALLER_THAN'><CFSET Criteria = Criteria & " < '#Value#' ">
  13.     <CFELSEIF Attributes.operator is 'CONTAINS'>        <CFSET Criteria = Criteria & " LIKE '%#Value#%' ">
  14.     <CFELSEIF Attributes.operator is 'BEGINS_WITH'> <CFSET Criteria = Criteria & " LIKE '#Value#%' ">
  15.     <CFELSEIF Attributes.operator is 'ENDS_WITH'>   <CFSET Criteria = Criteria & " LIKE '%#Value#' ">
  16.     </CFIF>
  17.  
  18. <CFELSEIF ListFindNoCase( 'INT,FLOAT,BIT,DATETIME', Attributes.FieldType )>
  19.     <CFIF Attributes.operator is 'EQUAL'>       <CFSET Criteria = Criteria & " = #Value# ">
  20.     <CFELSEIF Attributes.operator is 'NOT_EQUAL'>   <CFSET Criteria = Criteria & " <> #Value# ">
  21.     <CFELSEIF Attributes.operator is 'GREATER_THAN'><CFSET Criteria = Criteria & " > #Value# ">
  22.     <CFELSEIF Attributes.operator is 'SMALLER_THAN'><CFSET Criteria = Criteria & " < #Value# ">
  23.     </CFIF>
  24. </CFIF>
  25.  
  26. <CFIF Trim( Caller.Criteria ) is ''>
  27.   <CFSET Caller.Criteria = Caller.Criteria & Criteria>
  28. <CFELSE>
  29.   <CFSET Caller.Criteria = Caller.Criteria & " AND " & Criteria>
  30. </CFIF>
  31.  
  32.  
  33.